home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2001 May / SGI IRIX Base Documentation 2001 May.iso / usr / share / catman / p_man / cat3 / f90 / pxfchdir.z / pxfchdir
Encoding:
Text File  |  1998-10-30  |  3.0 KB  |  73 lines
  1. PXFCHDIR(3F)                                           Last changed: 1-6-98
  2.  
  3.  
  4. NNAAMMEE
  5.      PPXXFFCCHHDDIIRR - Changes the current directory to a specified directory
  6.  
  7. SSYYNNOOPPSSIISS
  8.      CCHHAARRAACCTTEERR*_n _p_a_t_h
  9.      IINNTTEEGGEERR _i_l_e_n,, _i_e_r_r_o_r
  10.      CCAALLLL PPXXFFCCHHDDIIRR((_p_a_t_h,, _i_l_e_n,, _i_e_r_r_o_r))
  11.  
  12. IIMMPPLLEEMMEENNTTAATTIIOONN
  13.      UNICOS, UNICOS/mk, and IRIX systems
  14.  
  15. SSTTAANNDDAARRDDSS
  16.      IEEE standard interface for FORTRAN 77
  17.  
  18. DDEESSCCRRIIPPTTIIOONN
  19.      On IRIX systems, this routine is in lliibbffoorrttrraann..ssoo which is linked by
  20.      default when compiling programs with the MIPSpro 7 Fortran 90 compiler
  21.      or when compiling programs with the --ccrraayylliibbss option to the MIPSpro
  22.      7.2 F77 compiler.
  23.  
  24.      The PPXXFFCCHHDDIIRR subroutine uses the cchhddiirr(2) system call to change the
  25.      current working directory to the specified directory.
  26.  
  27.      When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
  28.      UNICOS, UNICOS/mk, or IRIX system, all arguments must be of default
  29.      kind unless documented otherwise.  On UNICOS and UNICOS/mk, default
  30.      kind is KKIINNDD==88 for integer, real, complex, and logical arguments; on
  31.      IRIX, the default kind is KKIINNDD==44.
  32.  
  33.      The following is a list of valid arguments for this subroutine:
  34.  
  35.      _p_a_t_h      An input character variable or array element containing the
  36.                new directory.
  37.  
  38.      _i_l_e_n      An input integer variable containing the length of _p_a_t_h in
  39.                characters.  If _i_l_e_n is zero, all trailing blanks are
  40.                removed before calling cchhddiirr().
  41.  
  42.      _i_e_r_r_o_r    An output integer variable that contains zero if the current
  43.                working directory was changed or nonzero if the change of
  44.                directories was not made.
  45.  
  46.      In addition to the errors returned by the cchhddiirr(2) system call,
  47.      PPXXFFCCHHDDIIRR may return the following errors:
  48.  
  49.      EEIINNVVAALL    If _i_l_e_n is less than 0 or if _i_l_e_n is greater than LLEENN((_p_a_t_h))
  50.  
  51.      EENNOOMMEEMM    If PPXXFFCCHHDDIIRR is unable to obtain memory to copy _p_a_t_h
  52.  
  53. EEXXAAMMPPLLEESS
  54.           program test
  55.           character*(12) path
  56.           integer ilen, ierr
  57.           path = 'dir/testdir'
  58.           ilen = 0
  59.           call pxfchdir(path,ilen,ierr)
  60.           if (ierr.ne.0) then
  61.               print *,'FAIL: error from pxfchdir = ',ierr
  62.           else
  63.               print *,'PASS: No error from pxfchdir = '
  64.           endif
  65.           end
  66.  
  67. SSEEEE AALLSSOO
  68.      cchhddiirr(2)
  69.  
  70.      _A_p_p_l_i_c_a_t_i_o_n _P_r_o_g_r_a_m_m_e_r'_s _L_i_b_r_a_r_y _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-
  71.      2165, for the printed version of this man page.
  72.  
  73.